package com.mytools.tool.calendar;

import com.mytools.tool.utils.StringUtil;

import java.text.ParseException;
import java.text.SimpleDateFormat;
import java.util.Calendar;
import java.util.Date;


public class CalendarUtil {


    private int year;
    private int month;
    private int day;
    private boolean leap;
    
    int yearCyl, monCyl, dayCyl;
    
    /**用于保存中文的月份*/
    final static String CHINESE_NUMBER[] = {"一", "二", "三", "四", "五", "六", "七", "八", "九", "十", "十一", "腊"};
    /**用于保存展示周几使用*/
    private final static String WEEK_NUMBER[] = { "日", "一", "二", "三", "四", "五", "六" };
    /**转换为2012年11月22日格式*/
    static SimpleDateFormat chineseDateFormat = new SimpleDateFormat("yyyy年MM月dd日");
    /**转换为2012-11-22格式*/
    private static SimpleDateFormat simpleDateFormat = new SimpleDateFormat("yyyy-MM-dd");
    /**计算得到农历的年份*/
    private int mLuchYear;
    /**计算得到农历的月份*/
    private int mLuchMonth;
    /**计算得到农历的日期*/
    private int mLuchDay;
    /**用于标识是事为闰年*/
    private boolean isLoap;
    /**用于记录当前处理的时间*/
    private Calendar mCurrenCalendar;
    
    final static long[] lunarInfo = new long[]{0x04bd8, 0x04ae0, 0x0a570,
            0x054d5, 0x0d260, 0x0d950, 0x16554, 0x056a0, 0x09ad0, 0x055d2,
            0x04ae0, 0x0a5b6, 0x0a4d0, 0x0d250, 0x1d255, 0x0b540, 0x0d6a0,
            0x0ada2, 0x095b0, 0x14977, 0x04970, 0x0a4b0, 0x0b4b5, 0x06a50,
            0x06d40, 0x1ab54, 0x02b60, 0x09570, 0x052f2, 0x04970, 0x06566,
            0x0d4a0, 0x0ea50, 0x06e95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0,
            0x1c8d7, 0x0c950, 0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4,
            0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557, 0x06ca0, 0x0b550,
            0x15355, 0x04da0, 0x0a5d0, 0x14573, 0x052d0, 0x0a9a8, 0x0e950,
            0x06aa0, 0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260,
            0x0f263, 0x0d950, 0x05b57, 0x056a0, 0x096d0, 0x04dd5, 0x04ad0,
            0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b5a0, 0x195a6,
            0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40,
            0x0af46, 0x0ab60, 0x09570, 0x04af5, 0x04970, 0x064b0, 0x074a3,
            0x0ea50, 0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0, 0x0c960,
            0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0,
            0x092d0, 0x0cab5, 0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9,
            0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930, 0x07954, 0x06aa0,
            0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65,
            0x0d530, 0x05aa0, 0x076a3, 0x096d0, 0x04bd7, 0x04ad0, 0x0a4d0,
            0x1d0b6, 0x0d250, 0x0d520, 0x0dd45, 0x0b5a0, 0x056d0, 0x055b2,
            0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0};

    /**
     * 传回农历 year年的总天数
     * @param year 将要计算的年份
     * @return 返回传入年份的总天数
     */
    final private static int yearDays(int y) {
        int i, sum = 348;
        for (i = 0x8000; i > 0x8; i >>= 1) {
            if ((lunarInfo[y - 1900] & i) != 0)
                sum += 1;
        }
        return (sum + leapDays(y));
    }

    /**
     * 传回农历 year年闰月的天数
     * @param year 将要计算的年份
     * @return 返回 农历 year年闰月的天数
     */
    final private static int leapDays(int y) {
        if (leapMonth(y) != 0) {
            if ((lunarInfo[y - 1900] & 0x10000) != 0)
                return 30;
            else
                return 29;
        } else
            return 0;
    }

    /**
     * 传回农历 year年闰哪个月 1-12 , 没闰传回 0
     * @param year 将要计算的年份
     * @return 传回农历 year年闰哪个月 1-12 , 没闰传回 0
     */
    final private static int leapMonth(int y) {
        return (int) (lunarInfo[y - 1900] & 0xf);
    }

    /**
     * 传回农历 year年month月的总天数
     * @param year 将要计算的年份
     * @param month 将要计算的月份
     * @return 传回农历 year年month月的总天数
     */
    final private static int monthDays(int y, int m) {
        if ((lunarInfo[y - 1900] & (0x10000 >> m)) == 0)
            return 29;
        else
            return 30;
    }

    /**
     * 传回农历 y年的生肖
     * @return 传回农历 y年的生肖
     */
    final public String animalsYear() {
        final String[] Animals = new String[]{"鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪"};
        return Animals[(year - 4) % 12];
    }
    
    final public int getWeekNumOfMonth(){
        return mCurrenCalendar.get(Calendar.WEEK_OF_MONTH);
    }
    
    final public int getWeekNumOfYear(){
    	return mCurrenCalendar.get(Calendar.WEEK_OF_YEAR);
    }

    // ====== 传入 月日的offset 传回干支, 0=甲子
    final public static String cyclicalm(int num) {
        final String[] Gan = new String[]{"甲", "乙", "丙", "丁", "戊", "己", "庚", "辛", "壬", "癸"};
        final String[] Zhi = new String[]{"子", "丑", "寅", "卯", "辰", "巳", "午", "未", "申", "酉", "戌", "亥"};
        return (Gan[num % 10] + Zhi[num % 12]);
    }

    // ====== 传入 offset 传回干支, 0=甲子
    final public String cyclical_year() {
        int num = year - 1900 + 36;
        return (cyclicalm(num));
    }
    
    //yearCyl, monCyl, 
    // ====== 传入 offset 传回干支, 0=甲子
    final public String cyclical_month() {
    	return (cyclicalm(monCyl));
    }
    
    // ====== 传入 offset 传回干支, 0=甲子
    final public String cyclical_day() {
    	return (cyclicalm(dayCyl));
    }

    /**
     * 传出y年m月d日对应的农历. yearCyl3:农历年与1864的相差数 ? monCyl4:从1900年1月31日以来,闰月数
     * dayCyl5:与1900年1月31日相差的天数,再加40 ?
     * @param cal
     * @return
     */
    public CalendarUtil(Calendar cal) {
    	
        mCurrenCalendar = cal;
        int leapMonth = 0;
        Date baseDate = null;
        try {
            baseDate = chineseDateFormat.parse("1900年1月31日");
        } catch (ParseException e) {
            e.printStackTrace(); // To change body of catch statement use Options | File Templates.
        }
 
        // 求出和1900年1月31日相差的天数
        int offset = (int) ((cal.getTime().getTime() - baseDate.getTime()) / 86400000L);
        dayCyl = offset + 40;
        monCyl = 14;
        
        // 用offset减去每农历年的天数
        // 计算当天是农历第几天
        // i最终结果是农历的年份
        // offset是当年的第几天
        int iYear, daysOfYear = 0;
        for (iYear = 1900; iYear < 2050 && offset > 0; iYear++) {
            daysOfYear = yearDays(iYear);
            offset -= daysOfYear;
            monCyl += 12;
        }
        if (offset < 0) {
            offset += daysOfYear;
            iYear--;
            monCyl -= 12;
        }
        
        // 农历年份
        year = iYear;
        yearCyl = iYear - 1864;
        mLuchYear = iYear;
        leapMonth = leapMonth(iYear); // 闰哪个月,1-12
        isLoap = false;
 
        // 用当年的天数offset,逐个减去每月（农历）的天数，求出当天是本月的第几天
        int iMonth, daysOfMonth = 0;
        for (iMonth = 1; iMonth < 13 && offset > 0; iMonth++) {
            // 闰月
            if (leapMonth > 0 && iMonth == (leapMonth + 1) && !isLoap) {
                --iMonth;
                isLoap = true;
                daysOfMonth = leapDays(mLuchYear);
            } else
                daysOfMonth = monthDays(mLuchYear, iMonth);
 
            offset -= daysOfMonth;
            // 解除闰月
            if (isLoap && iMonth == (leapMonth + 1))
                isLoap = false;
            if (!isLoap) {
            	monCyl++;
            }
        }
        // offset为0时，并且刚才计算的月份是闰月，要校正
        if (offset == 0 && leapMonth > 0 && iMonth == leapMonth + 1) {
            if (isLoap) {
                isLoap = false;
            } else {
                isLoap = true;
                --iMonth;
                --monCyl;
            }
        }
        // offset小于0时，也要校正
        if (offset < 0) {
            offset += daysOfMonth;
            --iMonth;
            --monCyl;
        }
        mLuchMonth = iMonth;
        mLuchDay = offset + 1;
    }

    /**
     * 返化成中文格式
     * @param day
     * @return
     */
    public static String getChinaDayString(int day) {
        String chineseTen[] = {"初", "十", "廿", "卅"};
        int n = day % 10 == 0 ? 9 : day % 10 - 1;
        if (day > 30) return "";
        if (day == 10) return "初十";
        else return chineseTen[day / 10] + CHINESE_NUMBER[n];
    }

    public String getNDate(){
    	return "农历："+CHINESE_NUMBER[mLuchMonth - 1] + "月 "+getChinaDayString(mLuchDay);
    }
    
    public String getNFestival(){
    	String out = "";
    	String festival = getChinaCalendarMsg(mLuchYear, mLuchMonth, mLuchDay).trim();
    	String solarterm = new SolarTermsUtil(mCurrenCalendar).getSolartermsMsg().trim();
    	if(!StringUtil.isNull(festival)){
    		out = "节日："+festival;
    		if(!StringUtil.isNull(solarterm)){
    			out = out + "("+solarterm+")";
    		}
    	}
    	else if(!StringUtil.isNull(solarterm)){
    		out = "节气："+solarterm;
    	}
    	return out;
    }
    
    
    
    /**
     * 用于显示农历的初几这种格式
     * @return 农历的日期
     */
    public String toString() {
        //return getChinaDayString(day);
        String message = "";
        // int n = mLuchDay % 10 == 0 ? 9 : mLuchDay % 10 - 1;
        message = getChinaCalendarMsg(mLuchYear, mLuchMonth, mLuchDay);
        if (StringUtil.isNull(message)) {
            String solarMsg = new SolarTermsUtil(mCurrenCalendar).getSolartermsMsg();
            // 判断当前日期是否为节气
            if (!StringUtil.isNull(solarMsg)) {
                message = solarMsg;
            } else {
                /**判断当前日期是否为公历节日*/
                String gremessage = new GregorianUtil(mCurrenCalendar).getGremessage();
                if (!StringUtil.isNull(gremessage)) {
                    message = gremessage;
                } else if (mLuchDay == 1) {
                    message = CHINESE_NUMBER[mLuchMonth - 1] + "月";
                } else {
                    message = getChinaDayString(mLuchDay);
                }
            }
        }
        return message;
    }

    public String getDay() {
        return year + "年" + (leap ? "闰" : "") + CHINESE_NUMBER[month - 1] + "月" + getChinaDayString(day);
    }
    
    /**
     * 把calendar转化为当前年月日
     * @param calendar Calendar
     * @return 返回成转换好的 年月日格式
     */
    public static String getDay(Calendar calendar) {
        return simpleDateFormat.format(calendar.getTime());
    }
    
    /**
     * 用于比对二个日期的大小
     * @param compareDate 将要比对的时间
     * @param currentDate 当前时间
     * @return true 表示大于当前时间 false 表示小于当前时间
     */
    public static boolean compare(Date compareDate, Date currentDate) {
        return chineseDateFormat.format(compareDate).compareTo(
                chineseDateFormat.format(currentDate)) >= 0;
    }
    
    /**
     * 获取当前周几
     * @param calendar
     * @return
     */
    public String getWeek(Calendar calendar) {
        return "星期" + WEEK_NUMBER[calendar.get(Calendar.DAY_OF_WEEK) - 1] + "";
    }
 
    /**
     * 将当前时间转换成要展示的形式
     * @param calendar
     * @return
     */
    public String getCurrentDay(Calendar calendar) {
        return getDay(calendar) + " 农历" + new CalendarUtil(calendar).getDay() + " " + getWeek(calendar);
    }
    
    /**
     * 用于获取中国的传统节日
     * @param month 农历的月
     * @param day 农历日
     * @return 中国传统节日
     */
    private String getChinaCalendarMsg(int year, int month, int day) {
        String message = "";
        if (((month) == 1) && day == 1) {
            message = "春节";
        } else if (((month) == 1) && day == 15) {
            message = "元宵";
        } else if (((month) == 5) && day == 5) {
            message = "端午";
        } else if ((month == 7) && day == 7) {
            message = "七夕";
        } else if (((month) == 8) && day == 15) {
            message = "中秋";
        } else if ((month == 9) && day == 9) {
            message = "重阳";
        } else if ((month == 12) && day == 8) {
            message = "腊八";
        } else {
            if (month == 12) {
                if ((((monthDays(year, month) == 29) && day == 29)) || ((((monthDays(year, month) == 30) && day == 30)))) {
                    message = "除夕";
                }
            }
        }
        return message;
    }
    
}